unit UMantenimiento_ClienteUt;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics,
  Controls, Forms, Dialogs, uniGUITypes, uniGUIAbstractClasses,
  uniGUIClasses, uniGUIForm, UNuevo_Cliente, FMTBcd, DB, DBClient, SqlExpr,
  Provider, uniDBComboBox, uniMultiItem, uniComboBox, uniRadioButton, uniDBEdit,
  uniBasicGrid, uniDBGrid, uniBitBtn, uniRadioGroup, uniEdit, uniDateTimePicker,
  uniCheckBox, uniLabel, uniButton, uniPanel, uniPageControl, uniGUIBaseClasses;

type
  TUMantenimiento_Cliente = class(TUPadreClientes)
    procedure UniFormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
    UMantenimiento_Cliente: TUMantenimiento_Cliente;

implementation


{$R *.dfm}

procedure TUMantenimiento_Cliente.UniFormCreate(Sender: TObject);
begin
  FTipoPrograma := tpMantenimiento;
  inherited;
end;

end.
